MB_DATA:ExtFiles/pack

Bei dieser Datei handelt es sich um ein Skript (s-Bit!) oder ein Programm, das als Argumente den Namen eines Verzeichnisses (Directories) und einer Datei ⁿbergeben bekommt. Das Verzeichnis soll in die Datei gepackt werden. Falls das verwendete Pack-Programm nicht eine Datei mit exakt dem vorgeschriebenen Datei-Namen erzeugt, mu▀ die Datei ggf. vor Verlassen des Skripts (oder des Programms) umbenannt werden. ZusΣtzlich kann vor dem Packen auch die Gr÷▀e des Verzeichnisses ⁿberprⁿft werden, und falls das Verzeichnis zu gro▀ ist, wird es nicht gepackt und die Datei mit dem ⁿbergebenen Namen gel÷scht. Die Mailbox erkennt das und gibt eine entsprechende Meldung an den Benutzer aus.

Folgenderma▀en k÷nnte ein entsprechendes Skript aussehen:

    .KEY directory/A,tofile/A
    .BRA {
    .KET }

    ;
    ; Calculate size of directory
    ; ( DU is included in MB:C )
    ;

    If `MB:C/Du -S "{directory}"` GT 2000 VAL
        ; sorry, too large
        Delete "{tofile}"
    Else
        ; okay, let's pack it
        LhA -a -A -b64 -e -P-1 -r -x a "{tofile}" "{directory}"
        ;Rename "{tofile}.lha" "{tofile}"
    EndIf